Know Your Soccer/Know Your Soccer.iso/Soccer/DIRECTOR/KTGCST.CST/00100_Script_New offon script

Text File | 1998-10-16 | 558b | 26 lines

global thisrollover,gbuttonstate,lastrollover
on buttonon thisrollover,below,above
  set work = []
  append work,thisrollover
  append work, below
  append work,above
  repeat with x in work
    set the blend of sprite(x) = 100
  end repeat
  updateStage
end



on buttonoff lastrollover,below,above
  set work = []
  append work,thisrollover
  append work, below
  append work,above
  if getat(gbuttonstate,getat(work,1)) > 0 then exit
     repeat with x in work
    set the blend of sprite(x) = 100
  end repeat
  end if
end